<%
ordine = split(request.Form("movies_list_sx[]"), ",")
for a = 0 to Ubound(ordine) 
	objConn.execute("UPDATE TB_BLOCCHI SET ID_ORDINE = " & a+1 & ", STR_POSIZIONE = 'S' WHERE ID = " & replace(ordine(a),"id",""))
next
ordine = split(request.Form("movies_list_dx[]"), ",")
for a = 0 to Ubound(ordine) 
	objConn.execute("UPDATE TB_BLOCCHI SET ID_ORDINE = " & a+1 & ", STR_POSIZIONE = 'D' WHERE ID = " & replace(ordine(a),"id",""))
next
%>